home *** CD-ROM | disk | FTP | other *** search
- #include<kiwi_inc.h>
- #include<kiwipro.h>
- #include<kiwiprin.h>
-
- MENU leiste[3]={
- "Datei",0,1,"",
- "Edit",0,1,"",
- "Druck",1,0,"",
- };
-
-
- MENU datei[1]={
- "Beenden",0,1,"",
- };
-
-
-
- char *compiler[4]={
- "Microsoft ",
- "Borland ",
- "Zortech ",
- "Sonstige ",
- };
-
- char *format[4]={
- "360 Kb 5 ¼",
- "720 Kb 3 ½",
- "1.2 Mb 5 ¼",
- "1.4 Mb 3 ¼",
- };
-
-
- char *zahlung[3]={
- "Nachnahme ",
- "Vorkasse ",
- "Scheck ",
- };
-
-
-
-
-
- struct user_format{
- char Name1[53];
- char Name2[53];
- char Name3[53];
- char Name4[53];
- char Strasse[53];
- char PLZ[6];
- char Ort[41];
- char Staat[53];
- RADIO compiler;
- RADIO format;
- RADIO zahlung;
- }user;
-
-
-
-
-
- /************************************************************************/
- main()
- {
- int c,ende=0;
- WINDOW win;
-
- init_tools(); /* Initialisier Toolbox */
-
- init_string(user.Name1,sizeof(user));
- init_main_menu(leiste,3);
- set_cursor_size(CURSOR_WEG); /* Verstecke Cursor */
-
- do
- {
- c=choose_main_menu();
- switch(c){
- case 0: ende=datei_menu();
- break;
-
- case 1: edit_entry();
- break;
-
- case 2: print_form();
- break;
-
- }
- }while(!ende);
-
-
- reset_tools(); /* Ende des Spasses */
-
- return(0);
- }
-
-
- int datei_menu()
- {
- int i=0,c;
- WINDOW win=0;
-
- c=choose_sub_menu(datei,1,&win);
- if(c==0)i=1;
-
- close_window(win);
-
- return(i);
- }
-
-
-
- int edit_entry()
- {
- int result=0;
- static WINDOW win=0;
-
- win=load_window("REGISTE1.WND");
- result=scanf_mask(win,0,"x", user.Name1,
- user.Name2,
- user.Name3,
- user.Name4,
- user.Strasse,
- user.PLZ,
- user.Ort,
- user.Staat,
- &user.compiler,
- &user.format,
- &user.zahlung
- /* Button Abbruch */);
-
-
- close_window(win);
- leiste[2].aktiv=1;
-
- return(0);
- }
-
-
-
-
- int print_form()
- {
- int result=0;
- static WINDOW win=0;
- DATUM datum;
-
- if(dialog("Wollen Sie jetzt drucken",AM,AM)==1 && check_drucker()==TRUE)
- {
- get_system_date(&datum);
- set_window_display_mode(OFF);
- win=load_window("REGISTE2.WND");
- set_window_display_mode(ON);
- result=print_mask(win,0,"x", user.Name1,
- user.Name2,
- user.Name3,
- user.Name4,
- user.Strasse,
- user.PLZ,
- user.Ort,
- user.Staat,
- compiler[user.compiler],
- format[user.format],
- zahlung[user.zahlung],
- user.Ort,
- &datum);
-
- print_mode(FETT_EIN);
- print_vs_screen(get_linked_screen(win));
- print_mode(FETT_AUS);
- print_mode(FORM_FEED);
- close_window(win);
- }
-
- return(0);
- }
-
- int check_drucker()
- {
- int result=TRUE;
-
- if(check_default_printer_status() & 7)
- {
- if(dialog2("Drucker nicht bereit !!\n Wollen Sie weiterdrucken ?","Drucken","Abbrechen",AM,AM)==1)
- {
- kw_wait(100);
- if(check_default_printer_status() & 7)result=FALSE;
- }
- else result=FALSE;
- }
- return(result);
- }
-
-
- /* Initialisiere das TOOL Paket */
- int init_tools()
- {
-
- init_screen(VBLAU,HWEIS,VWEIS,HBLAU,MUSTER,DIREKT);
-
- cls(); /* Loesche Schirm mit zeichen */
- init_window(10); /* Mache Platz fuer 30 Fenster */
- init_virtuell_screen(10);
-
- init_window_manager();
- set_winman_mask(WINDOW_MOVE);
- set_window_move_mode(MIT_RAND);
- set_cursor_size(CURSOR_WEG); /* Verstecke Cursor */
-
- set_scanf_exit_code(1,F6,1);
- set_scanf_exit_code(2,F5,0);
- set_scanf(EXTRA_COL_ON); /* Sonderdarstellung an 3.Farbe */
- init_printer("standard.ksp"); /* init printer */
-
- /* Mouse */
- set_mouse_cursor_size(CURSOR_VOLL); /* Setze Mauscursorform */
- init_mouse(); /* Aktiviere Maus wenn da */
- limit_mouse_area(1,1,get_screen_wide(),get_screen_height());
-
- set_button_mode(TURBO_MODE);
- set_button_mode(SHADOW_ON);
- set_button_mode(KLICK_ON);
-
- return(0);
- }
-
-
-
- /* Reinitialisiere das Tool Paket */
- reset_tools()
- {
- reset_mouse(); /* Maus weg */
- reset_virtuell_screen(); /* Screens weg */
- reset_window(); /* Fenster frei */
- reset_screen(); /* Bildschirm frei */
- set_video_mode(C_80x25);
- check_memory();
-
- clear(); /* Loesche Bildschirm */
- exit(0);
-
- return;
- }
-
-
- int check_window_manager(mode,mx,my)
- int mode;
- unsigned int mx,my;
- {
- return(window_manager(mode,mx,my));
- }
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-